<%
if not isempty(request("pageno")) or request("pageno")<>0 then
pageno=request.querystring("pageno")
else
pageno=1
end if
if request("mic_type") <> "" then
mic_news_type=request("mic_type")
else
mic_news_type=0
end if
%>
<%
strsql="select * from mic_news_type where id = "&request("mic_type")
set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open strsql, conn, 1, 1
titlename = rs1("type_name")
rs1.close
set rs1=nothing
%>
<%=titlename%>-Knowledge - ShenZhen Krexi international Logistics Co.,Ltd
Now:Home - Knowledge
<%=titlename%>
<%
sql="select * from news_info where mic_news_type = "&request("mic_type")&" order by id desc"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 1, 1
if not rs.eof then
page=18
rs.pagesize=page
maxpage=rs.pagecount
if pageno < 1 then
pageno =1
end if
if pageno+1 >maxpage+1 then
pageno=maxpage
end if
rs.absolutePage=pageno
else
maxpage=1
end if
total = rs.RecordCount
while not rs.eof and page>0
%>
" title ="<% =rs("title") %>" ><% =rs("title") %>
- <% =rs("datetime") %>
<% if not rs.eof then
rs.movenext
end if
page=page-1
wend
rs.close
set rs=nothing
%>